package com.hmdp.utils;

import cn.hutool.core.util.BooleanUtil;
import cn.hutool.json.JSONObject;
import cn.hutool.json.JSONUtil;
import com.hmdp.entity.Shop;
import lombok.extern.slf4j.Slf4j;
import org.springframework.data.redis.core.StringRedisTemplate;
import org.springframework.stereotype.Component;
import org.springframework.util.StringUtils;

import javax.annotation.Resource;
import java.time.LocalDateTime;
import java.util.concurrent.ExecutorService;
import java.util.concurrent.Executors;
import java.util.concurrent.TimeUnit;
import java.util.function.Function;

/**
 * 缓存工具类
 * @author jyh
 * @version 1.0
 * @since 2025/8/7
 */
@Slf4j
@Component
public class CacheClient {
    @Resource
    private StringRedisTemplate stringRedisTemplate;
    private static final ExecutorService CACHE_REBUILD_EXECUTOR = Executors.newFixedThreadPool(10);


    /**
     * 将任意Java对象序列化为json并存储在string类型的key中，并且可以设置TTL过期时间
     * @param key
     * @param object
     * @param time
     * @param unit
     */
    public void  set(String key,Object object,Long time,TimeUnit unit){
        stringRedisTemplate.opsForValue().set(key,JSONUtil.toJsonStr(object),time,unit);
    }

    /**
     * 将任意Java对象序列化为json并存储在string类型的key中，并且可以设置逻辑过期时间，用于处理缓存击穿问题
     * @param key
     * @param object
     * @param time
     * @param unit
     */
    public void setWithLogicalExpire(String key,Object object,Long time,TimeUnit unit){
        RedisData redisData = new RedisData();
        redisData.setData(object);
        redisData.setExpireTime(LocalDateTime.now().plusSeconds(unit.toSeconds(time)));
        stringRedisTemplate.opsForValue().set(key,JSONUtil.toJsonStr(redisData));
    }


    /**
     * 利用加入空值缓存解决缓存穿透问题
     * @param keyPrefix
     * @param id
     * @param type
     * @param dbFallback
     * @param time
     * @param unit
     * @return
     * @param <R>
     * @param <ID>
     */
    public <R,ID> R  queryWithPassThrough(String keyPrefix, ID id, Class<R> type,
                                          Function<ID,R> dbFallback,Long time, TimeUnit unit) {
        //1.在缓存中查询商品是否存在
        String key = keyPrefix + id;
        String json = stringRedisTemplate.opsForValue().get(key);
        //2.存在，直接返回
        if (!StringUtils.isEmpty(json)) {
            return JSONUtil.toBean(json, type);
        }
        //到达这里有两种可能，null || ""
        if (json != null) {
            return null;
        }
        //3.不存在，在数据库中查询是否存在
        R r = dbFallback.apply(id);
        if (r == null) {
            //4.不存在，返回错误信息,并将空值加入redis缓存，解决缓存穿透的问题
            this.set(key,"",RedisConstants.CACHE_NULL_TTL,TimeUnit.MINUTES);
            return null;
        }
        //5.存在，将商品信息加入redis缓存，并设置超时时间为30min
        this.set(key,r,time,unit);
        //6.返回商品信息
        return r;
    }

    /**
     * 利用互斥锁解决缓存击穿问题
     *
     * @param id
     * @return
     */
    public <R,ID> R queryShopIdWithMutex(String keyPrefix,ID id,Class<R> type,
                                         Function<ID,R> dbFallback,Long time, TimeUnit unit) {
        //1.在缓存中查询商品是否存在
        String key = keyPrefix + id;
        String json = stringRedisTemplate.opsForValue().get(key);
        //2.存在，直接返回
        if (!StringUtils.isEmpty(json)) {
            return JSONUtil.toBean(json, type);
        }
        //到达这里有两种可能，null || ""
        if (json != null) {
            return null;
        }
        //尝试获取互斥锁
        String lockKey = RedisConstants.LOCK_SHOP_KEY + id;
        R r = null;
        try {
            if (!tyrLock(lockKey)) {
                //未获取到互斥锁，休眠一段时间，然后重新获取
                Thread.sleep(50);
                return queryShopIdWithMutex(keyPrefix,id,type,dbFallback,time,unit);
            }
            //获取到了互斥锁，再次查询缓存中是否有数据
            json = stringRedisTemplate.opsForValue().get(key);
            if (!StringUtils.isEmpty(json)) {
                return JSONUtil.toBean(json, type);
            }
            if (json != null) {
                return null;
            }
            //缓存中不存在，查询数据库，重建缓存
            r = dbFallback.apply(id);
            Thread.sleep(200);//模拟缓存重建
            if (r == null) {
                this.set(key,"",RedisConstants.CACHE_NULL_TTL,TimeUnit.MINUTES);
                return null;
            }
            //存在，将商品信息加入redis缓存，并设置超时时间为30min
            this.set(key,r,time,unit);
        } catch (Exception e) {
            throw new RuntimeException(e);
        } finally {
            //释放互斥锁
            unLocak(lockKey);
        }
        //6.返回商品信息
        return r;
    }




    /**
     * 利用逻辑过期解决缓存击穿问题
     *
     * @param id
     * @return
     */
    public <R,ID> R queryShopIdWithLogicExpire(String keyPrefix, ID id, Class<R> type,
                                               Function<ID,R> dbFallback,Long time, TimeUnit unit) {
        //1.在缓存中查询商品是否存在
        String key = keyPrefix + id;
        String json = stringRedisTemplate.opsForValue().get(key);
        //2.未命中返回空
        if (StringUtils.isEmpty(json)) {
            //缓存未命中
            return null;
        }
        //3. 命中，需要判断缓存是否过期
        RedisData redisData = JSONUtil.toBean(json,RedisData.class);
        LocalDateTime expireTime = redisData.getExpireTime();
        R r = JSONUtil.toBean((JSONObject) redisData.getData(), type);
        //4. 未过期，直接返回商铺信息
        if (expireTime.isAfter(LocalDateTime.now())) {
            return r;
        }
        String lockKey = RedisConstants.LOCK_SHOP_KEY + id;
        //5. 过期，尝试获取互斥锁
        if (tyrLock(lockKey)) {
            //获取锁成功，应该再查一次redis，double check
            json = stringRedisTemplate.opsForValue().get(key);
            if (StringUtils.isEmpty(json)) {
                unLocak(lockKey);
                return null;
            }
            redisData = JSONUtil.toBean(json, RedisData.class);
            expireTime = redisData.getExpireTime();
            r = JSONUtil.toBean((JSONObject) redisData.getData(), type);
            if (expireTime.isAfter(LocalDateTime.now())) {
                unLocak(lockKey);
                return r;
            }
            //又查了一次，还是过期，开启独立线程进行缓存重建
            CACHE_REBUILD_EXECUTOR.submit(() -> {
                try {
                    // 查询数据库
                    R newR = dbFallback.apply(id);
                    // 重建缓存
                    Thread.sleep(300);
                    log.info("缓存重建完成。。。。");
                    this.setWithLogicalExpire(key, newR, time, unit);
                } catch (Exception e) {
                    throw  new RuntimeException(e);
                } finally {
                    unLocak(lockKey);
                }
            });
        }
        return r;
    }


    /**
     * 尝试获取互斥锁
     *
     * @param key
     * @return
     */
    private boolean tyrLock(String key) {
        Boolean flag = stringRedisTemplate.opsForValue().setIfAbsent(key, "1", RedisConstants.LOCK_SHOP_TTL, TimeUnit.SECONDS);
        return BooleanUtil.isTrue(flag);
    }

    /**
     * 释放互斥锁
     *
     * @param key
     */
    private void unLocak(String key) {
        stringRedisTemplate.delete(key);
    }

}
